TopOffset=21; LeftOffset=10; //Main Menu Items CreateMainMenuItem('Menu1','Menu1Pic','/img/xmnu1Pic.gif'); //News CreateMainMenuItem('Menu2','Menu2Pic','/img/xmnu2Pic.gif'); //Editorials CreateMainMenuItem('Menu3','Menu3Pic','/img/xmnu3Pic.gif'); //Departments CreateMainMenuItem('Menu4','Menu4Pic','/img/xmnu4Pic.gif'); //Sections CreateMainMenuItem('Menu5','Menu5Pic','/img/xmnu5Pic.gif'); //Events CreateMainMenuItem('Menu6','Menu6Pic','/img/xmnu6Pic.gif'); //Services CreateMainMenuItem('Menu7','Menu7Pic','/img/xmnu7Pic.gif'); //ITWeb Info FinishMainMenu(); //Create SubMenu 1 (News) StartSubMenu('Menu1Sub',2,LeftOffset+0,TopOffset+15,'N'); CreateSubMenuItem('Menu1Sub1',2,'/sections/Business/default.asp','Business','h'); CreateSubMenuItem('Menu1Sub2',2,'/sections/Financial/default.asp','Financial','h') CreateSubMenuItem('Menu1Sub3',2,'/sections/Computing/default.asp','Computing','h') CreateSubMenuItem('Menu1Sub4',2,'/sections/Software/default.asp','Software','h') CreateSubMenuItem('Menu1Sub5',2,'/sections/Hardware/default.asp','Hardware','h') CreateSubMenuItem('Menu1Sub6',2,'/sections/Enterprise/default.asp','Enterprise','h') CreateSubMenuItem('Menu1Sub7',2,'/sections/Channel/default.asp','Channel','h') CreateSubMenuItem('Menu1Sub8',2,'/sections/Internet/default.asp','Internet','h') CreateSubMenuItem('Menu1Sub9',2,'/sections/Networking/default.asp','Networking','h') CreateSubMenuItem('Menu1Sub10',2,'/sections/Telecoms/default.asp','Telecoms','h') CreateDivider(); CreateSubMenuItem('Menu1Sub13','2','/sections/cover/previous.asp','Yesterday news','h') CreateSubMenuItem('Menu1Sub14','2','/sections/cover/mostpopular.asp','Best read stories','h') CreateDivider(); CreateSubMenuItem('Menu1Sub11','2','/sections/weekatglance/index.asp','Week at a Glance','h') CreateSubMenuItem('Menu1Sub12','2','/sections/monthatglance/index.asp','Month at a Glance','h') FinishSubMenu(); //Create SubMenu 2 (OPINIONS) StartSubMenu('Menu2Sub',2,LeftOffset+41,TopOffset+15,'N'); CreateSubMenuItem('Menu2Sub1',2,'/sections/columnists/default.asp','Columnists','s') CreateDivider(); CreateSubMenuItem('Menu2Sub4',2,'/sections/feedback/feedbacks.asp','Feedback','h') CreateDivider(); CreateSubMenuItem('Menu2Sub2',2,'/sections/techforum/default.asp','TechForum','h') CreateSubMenuItem('Menu2Sub3',2,'/sections/industryinsight/default.asp','Industry Insight','h') FinishSubMenu(); //Menu2Sub1Sub (Editorials->Columnists) StartSubMenu('Menu2Sub1Sub',3,LeftOffset+190,TopOffset+15,'N') CreateSubMenuItem('Menu2Sub1Sub4',3,'/sections/columnists/default.asp','All Columnists','h') CreateSubMenuItem('Menu2Sub1Sub7',3,'/sections/columnists/index.asp?View=Authors','Guest Columnists','h') CreateSubMenuItem('Menu2Sub1Sub1',3,'/sections/columnists/authors.asp?View=Authors&Keyword=Paul%20Booth','Booths Bites | Paul Booth','h') CreateSubMenuItem('Menu2Sub1Sub2',3,'/sections/columnists/authors.asp?View=Authors&Keyword=ITWeb%20Editorial','Double Take | ITWeb Editorial','h') CreateSubMenuItem('Menu2Sub1Sub3',3,'/sections/columnists/authors.asp?View=Authors&Keyword=Carel%20Alberts','Dot Column | Carel Alberts','h') CreateSubMenuItem('Menu2Sub1Sub6',3,'/sections/columnists/authors.asp?View=Authors&Keyword=Warwick%20Ashford','Getting Real | Warwick Ashford','h') CreateSubMenuItem('Menu2Sub1Sub5',3,'/sections/columnists/authors.asp?View=Authors&Keyword=Georgina%20Guedes','Just Browsing | Georgina Guedes','h') CreateSubMenuItem('Menu2Sub1Sub9',3,'/sections/columnists/authors.asp?View=Authors&Keyword=Patrick%20Lawlor','Taking Stock | Patrick Lawlor','h') FinishSubMenu(); //Create SubMenu 3 (Departments) StartSubMenu('Menu3Sub',2,LeftOffset+110,TopOffset+15,'N') CreateSubMenuItem('Menu3Sub1',2,'/sections/features/default.asp','Features','h') CreateSubMenuItem('Menu3Sub2',2,'/sections/interviews/default.asp','Interviews','h') CreateSubMenuItem('Menu3Sub3',2,'/sections/specialfocus/default.asp','Special Focus','h') CreateSubMenuItem('Menu3Sub4',2,'/sections/reviews/default.asp','Reviews','h') FinishSubMenu(); //Create SubMenu 4 (Sections) StartSubMenu('Menu4Sub',2,LeftOffset+170,TopOffset+15,'N') CreateSubMenuItem('Menu4Sub1',2,'/sections/monitor/','Market Monitor','h') CreateSubMenuItem('Menu4Sub2',2,null,'Surveys','s') FinishSubMenu(); //Menu2Sub6Sub (Editorials->Surveys) StartSubMenu('Menu4Sub2Sub',3,LeftOffset+320,TopOffset+31,'N'); CreateSubMenuItem('Menu4Sub2Sub9',3,null,'Business Intelligence','s') CreateSubMenuItem('Menu4Sub2Sub10',3,null,'Ethics in IT','s') CreateSubMenuItem('Menu4Sub2Sub6',3,'/surveys/internetaddiction/2002/default.asp','Internet Addiction','h') CreateSubMenuItem('Menu4Sub2Sub7',3,'/surveys/readersurvey/2003/default.asp','Reader Survey','h') CreateSubMenuItem('Menu4Sub2Sub4',3,null,'Salary Survey','s') CreateSubMenuItem('Menu4Sub2Sub11',3,'/surveys/softwareskillssurvey/2004/default.asp','Software Skills Survey','h') FinishSubMenu(); StartSubMenu('Menu4Sub2Sub9Sub',4,LeftOffset+461,TopOffset+31,'N'); CreateSubMenuItem('Menu4Sub2Sub1',4,'/surveys/bis/2004/default.asp','Business Intelligence 2004','h') CreateSubMenuItem('Menu4Sub2Sub2',4,'/surveys/bis/2003/default.asp','Business Intelligence 2003','h') CreateSubMenuItem('Menu4Sub2Sub5',4,'/surveys/bis/2002/default.asp','Business Intelligence 2002','h') FinishSubMenu(); StartSubMenu('Menu4Sub2Sub10Sub',4,LeftOffset+461,TopOffset+48,'N'); CreateSubMenuItem('Menu4Sub2Sub10Sub1',4,'/surveys/ethicsinit/2003/default.asp','Ethics in IT 2003','h') CreateSubMenuItem('Menu4Sub2Sub10Sub2',4,'/surveys/ethicsinit/2002/default.asp','Ethics in IT 2002','h') FinishSubMenu(); StartSubMenu('Menu4Sub2Sub4Sub',4,LeftOffset+461,TopOffset+92,'N'); CreateSubMenuItem('Menu4Sub2Sub4Sub8',4,'/surveys/salary/2004/default.asp','Salary Survey 2004','h') CreateSubMenuItem('Menu4Sub2Sub4Sub9',4,'/surveys/salary/2003/default.asp','Salary Survey 2003','h') CreateSubMenuItem('Menu4Sub2Sub4Sub1',4,'/surveys/salary/2002/default.asp','Salary Survey 2002','h') CreateSubMenuItem('Menu4Sub2Sub4Sub2',4,'/sections/surveys/survey_2001.asp','Salary Survey 2001','h') CreateSubMenuItem('Menu4Sub2Sub4Sub3',4,'/sections/features/salarysurvey/feature991202.asp','Salary Survey 1999','h') CreateSubMenuItem('Menu4Sub2Sub4Sub4',4,'/sections/features/salarysurvey/feature990119.asp','Salary Survey 1998','h') FinishSubMenu(); //Create SubMenu 5 (Events) StartSubMenu('Menu5Sub',2,LeftOffset+230,TopOffset+15,'N') CreateSubMenuItem('Menu5Sub1',2,'http://www.careerweb.co.za','Jobs','h') CreateSubMenuItem('Menu5Sub2',2,'/sections/industrysolutions/','Industry Solutions','h') CreateSubMenuItem('Menu5Sub3',2,'http://www.trainingweb.co.za','Training','h') CreateSubMenuItem('Menu5Sub4',2,'/sections/itdirectory/','Directories','h') FinishSubMenu(); //Menu5Sub5Sub (Events->IT Personality) StartSubMenu('Menu6Sub3Sub',3,LeftOffset+450, TopOffset+90,'N') CreateSubMenuItem('Menu6Sub3Sub5',3,'/events/itpersonalityoftheyear/2004/','IT Personality 2004','h') CreateSubMenuItem('Menu6Sub3Sub4',3,'/events/itpersonalityoftheyearkzn/2004/','IT Personality 2004 - KZN','h') CreateSubMenuItem('Menu6Sub3Sub1',3,'/events/itpersonalityoftheyear/2003/','IT Personality 2003','h') CreateSubMenuItem('Menu6Sub3Sub2',3,'/events/itpersonalityoftheyear/KZN/','IT Personality 2003 - KZN','h') CreateSubMenuItem('Menu6Sub3Sub3',3,'/events/itpersonalityoftheyear/2002/','IT Personality 2002','h') FinishSubMenu(); //Menu6Sub7Sub (Events->Conferences 2004) StartSubMenu('Menu6Sub7Sub',3,LeftOffset+450,TopOffset+17,'N') CreateSubMenuItem('Menu6Sub7Sub7',3,'/events/voip/2004/default.asp','- VOIP: The way forward','h') CreateSubMenuItem('Menu6Sub7Sub6',3,'/events/enterprisearchitectureevent/2004/default.asp','- Enterprise Architecture','h') CreateSubMenuItem('Menu6Sub7Sub4',3,'/events/Futurexcapetown/2004/default.asp','- Futurex Cape Town','h') CreateSubMenuItem('Menu6Sub7Sub5',3,'/events/beeinit/2004/default.asp','- How to BEE in IT','h') CreateSubMenuItem('Menu6Sub7Sub3',3,'/events/futurexconference/2004/default.asp','- Futurex','h') CreateSubMenuItem('Menu6Sub7Sub2',3,'/events/hotspot/2004/','- Hotspot','h') CreateSubMenuItem('Menu6Sub7Sub1',3,'/events/ITConfidence/2004/','- IT Confidence','h') FinishSubMenu(); //Menu6Sub10Sub (Events->Conferences 2004) StartSubMenu('Menu6Sub10Sub',3,LeftOffset+450,TopOffset+17,'N') CreateSubMenuItem('Menu6Sub10Sub1',3,'/events/OpenEnterpriseEvent/2004','- Open Enterprise','h') FinishSubMenu(); //Menu6Sub1Sub (Events->Conferences 2004) StartSubMenu('Menu6Sub1Sub',3,LeftOffset+450,TopOffset+120,'N') CreateSubMenuItem('Menu6Sub1Sub2',3,'/events/golfchallenge2005/','- ITWeb Golf Challenge 2005','h') CreateSubMenuItem('Menu6Sub1Sub1',3,'/events/golfchallenge2004/','- ITWeb Golf Challenge 2004','h') FinishSubMenu(); //Create SubMenu 6 (Events) StartSubMenu('Menu6Sub',2,LeftOffset+300,TopOffset+15,'N') //CreateSubMenuItem('Menu6Sub2',2,'/sections/adecadeoftelecommunicationsinsa/','A Decade of Telecommunications','h') CreateDivider(); CreateSubMenuItem('Menu6Sub10',2,null,'Conferences 2005','s') CreateSubMenuItem('Menu6Sub7',2,null,'Conferences 2004','s') //CreateSubMenuItem('Menu6Sub4',2,null,'Conferences 2003','s') //CreateSubMenuItem('Menu6Sub5',2,null,'Conferences 2002','s') CreateSubMenuItem('Menu6Sub8',2,null,'Events Archive','s') CreateDivider(); CreateSubMenuItem('Menu6Sub6',2,'/sections/eventscalendar/default.asp','Events Calendar','h') CreateSubMenuItem('Menu6Sub9',2,null,'ITWebs Business Briefings','s') CreateSubMenuItem('Menu6Sub3',2,null,'IT Personality','s') CreateSubMenuItem('Menu6Sub1',2,null,'ITWeb Technology Golf Challenge','s') //CreateSubMenuItem('Menu6Sub1',2,'/events/golfchallenge2004/','ITWeb Technology Golf Challenge','h') CreateDivider(); FinishSubMenu(); //Create SubMenu6Sub9 (Events->Events Archive) StartSubMenu('Menu6Sub9Sub',2,LeftOffset+450,TopOffset+80,'N') CreateSubMenuItem('Menu6Sub9Sub1',3,'/events/successfuldatacentres/2004/default.asp','- Successful Datacentres','h') CreateSubMenuItem('Menu6Sub9Sub2',3,'/events/AssetRentalOptions/2004/default.asp','- Asset Rental Options','h') FinishSubMenu(); //Create SubMenu6Sub8 (Events->Events Archive) StartSubMenu('Menu6Sub8Sub',2,LeftOffset+450,TopOffset+48,'N') CreateSubMenuItem('Menu6Sub8Sub2',3,null,'Conferences 2003','s') CreateSubMenuItem('Menu6Sub8Sub1',3,null,'Conferences 2002','s') FinishSubMenu(); //Menu6Sub8Sub2 (Events->Events Archive->Conferences 2003) StartSubMenu('Menu6Sub8Sub2Sub',3,LeftOffset+600,TopOffset+30,'N') CreateSubMenuItem('Menu6Sub8Sub2Sub5',4,'/events/beeinit/2003/','BEE in IT','h') CreateSubMenuItem('Menu6Sub8Sub2Sub4',4,'/events/beeinit/FollowUp/','BEE in IT Followup','h') CreateSubMenuItem('Menu6Sub8Sub2Sub3',4,'/events/brainstorm/2003/','Brainstorm 2003 - IT drives business','h') CreateSubMenuItem('Menu6Sub8Sub2Sub2',4,'/events/securityconference/2003/','Security - IT`s ultimate challenge ','h') CreateSubMenuItem('Menu6Sub8Sub2Sub1',4,'/events/gssc/2003/','Transforming public sector delivery through IT','h') FinishSubMenu(); //Menu6Sub8Sub2 (Events->Events Archive->Conferences 2002) StartSubMenu('Menu6Sub8Sub1Sub',3,LeftOffset+600, TopOffset+45,'N') CreateSubMenuItem('Menu6Sub8Sub1Sub3',4,'/events/e-marketplaces/2002/','e-Marketplaces','h') CreateSubMenuItem('Menu6Sub8Sub1Sub2',4,'/events/brainstorm/2002/','Brainstorm 2002 - Restoring faith in IT','h') CreateSubMenuItem('Menu6Sub8Sub1Sub1',4,'/events/itgovernance/2002 ','IT Governance','h') FinishSubMenu(); //Create SubMenu 7 (ITWeb Info) StartSubMenu('Menu7Sub',2,LeftOffset+330,TopOffset+15,'N') CreateSubMenuItem('Menu7Sub1','2','/sections/contact/default.asp','Contact Info','h') CreateSubMenuItem('Menu7Sub2','2','/sections/advertisingonitweb/default.asp','Advertising Info','h') CreateSubMenuItem('Menu7Sub3','2','/sections/policies/privacy.asp','Privacy Policy','h') CreateDivider(); CreateSubMenuItem('Menu7Sub5','2','/services/subscriptions/','Free newsletters ','h') CreateSubMenuItem('Menu7Sub6','2','/sections/onlinestore/default.asp','Online Store','h') CreateSubMenuItem('Menu7Sub7','2','/services/epoints/default.asp','Loyalty Programme','h') CreateSubMenuItem('Menu7Sub8','2','/sections/companiesaz/default.asp','Companies A-Z','h') CreateDivider(); //CreateSubMenuItem('Menu7Sub10','2','/sections/itwebradio/default.asp','ITWeb Radio','h') CreateSubMenuItem('Menu7Sub11','2','/include/incMobile.asp','ITWeb PDA','h') FinishSubMenu();